perm filename LSPTTY.860[MAC,LSP] blob sn#468081 filedate 1979-08-18 generic text, type T, neo UTF8
MIDAS.410
****** MACLISP ****** LISP INTERPRETER AND SYSTEM *************
MACLISP VERSION 860 [1860] ASSEMBLED ON ITS AT MC
INITIAL SWITCH VALUES (*=EXPERIMENTAL):
  ITS=0
  TOPS10=0
  TOPS20=0
  SAIL=0
* TENEX=0
* CMU=0
  KA10=0
* KI10=0
* KL10=0
  ML=0
  BIGNUM=1
  OBTSIZ=777
  JOBQIO=1
  HNKLOG=10
  USELESS=1
* DBFLAG=0
* CXFLAG=0
* NARITH=0
* SFA=0
REDEFINITIONS:
TTY: .INSRTed, end input with ↑C
ML==1



SAIL==1



NONE OF {KA10,KI10,KL10⎇ SPECIFIED - ASSUMING KA10==:1
	IFE ITS => JOBQIO==:0
	IFE ITS => LHFLAG==:0
	IFG SAIL*<6-NIOBFS> => NIOBFS==:6
FLUSHING ITS SYMBOL DEFINITIONS
    ==> INSERTED:  ITSDFS 4
FLUSHING ITS BIT DEFINITIONS
    ==> INSERTED:  BITS 60
MAKING SAIL SYMBOL DEFINITIONS
    ==> INSERTED:  SAIDFS 15
MAKING SAIL BIT DEFINITIONS
    ==> INSERTED:  DECBTS 232
	***** FIVE "ZERO" (LOW IMPURE) SEGMENTS
	***** TWO SEGMENT TABLE SEGMENTS
	P0:  3137	[ERROR HANDLERS AND MESSAGES]
	READTABLE LENGTH = 1010
	P1:  14412	[TOPLEVEL, COMMON, AND RANDOM STUFF]
	P2:  2632	[PRINT,TYO,EXPLODE,FLATC,BAKTRACE,ETC]
	P3:  1435	[UTAPE, LAP, AND AGGLOMERATED SUBRS]
	P4:  2144	[ARITHMETIC SUBROUTINES]
	P5:  1760	[BIGNUM-ONLY ARITHMETICS]
	P6:  2464	[EVAL, APPLY, STUFF OPEN-CODED BY COMPLR]
	P7:  2102	[GARBAGE COLLECTOR]
	P10:  1147	[MEMORY MANAGEMENT STUFF]
	P11:  3137	[HIRSUTE READER, MAKNAM, ETC.]
	P12:  1673	[ARRAY STUFF]
	P13:  2271	[FASLOAD]
FASLP1+25	447561	 2.   500-161	######
	###### RESTORE REF DATE FOR SAIL PROBEF?
OPEN9D+14	450510	 2.   513-059	###### IMAGE TTY OUTPUT?
$LSTN3+3	450661	 2.   516-034	###### REALLY OUGHT TO BE SMARTER
TTYMO2+5	451373	 2.   527-028	###### SAIL TTYMOR?
	P14:  4136	[NEW I/O PACKAGE]
	P15:  3363	[INTERRUPT AND UUO HANDLERS]
	***** 56 (OCTAL) SYSTEM SEGMENTS
	***** ONE SAR SEGMENT [760 UNUSED WORDS]
	***** ONE IMPURE SYMBOL BLOCK SEGMENT [740 UNUSED WORDS]
	P16:  461610	[SYSTEM ATOMS AND STUFF]
	***** ONE VALUE CELL SEGMENT [626 UNUSED WORDS]
	***** TWO SYMBOL HEADER SEGMENTS [725 UNUSED WORDS]
	***** THREE PURE SYMBOL BLOCK SEGMENTS
	HIGHEST NLISP INUM=1225
	LOWEST NLISP INUM=-625
	***** FOUR PURE FIXNUM SEGMENTS
	***** FOUR PURE LIST SEGMENTS [320 UNUSED WORDS]
	***** ZERO PURE FLONUM SEGMENTS
	***** TWO IMPURE LIST SEGMENTS [600 UNUSED WORDS]
	***** ONE IMPURE FIXNUM SEGMENT [733 UNUSED WORDS]
	***** ONE IMPURE FLONUM SEGMENT [777 UNUSED WORDS]
	***** ONE BIGNUM SEGMENT [773 UNUSED WORDS]
	TIME TO MAKE INITIAL STRUCT, PASS 1 = 51 SECS
	***** ONE BIT BLOCK SEGMENT

***** MACLISP ****** LISP INTERPRETER AND SYSTEM *************
	***** FIVE "ZERO" (LOW IMPURE) SEGMENTS
	***** TWO SEGMENT TABLE SEGMENTS
ALCK0+2		401570	 0.    79-036	ALARMC	Undefined
	P0:  3137	[ERROR HANDLERS AND MESSAGES]
PPNATM		404042	 0.    99-005	CMUP	Undefined
PPNATM+7	404051	 0.    99-012	DECCMU	Undefined
	READTABLE LENGTH = 1010
	P1:  14412	[TOPLEVEL, COMMON, AND RANDOM STUFF]
	P2:  2632	[PRINT,TYO,EXPLODE,FLATC,BAKTRACE,ETC]
	P3:  1435	[UTAPE, LAP, AND AGGLOMERATED SUBRS]
	P4:  2144	[ARITHMETIC SUBROUTINES]
	P5:  1760	[BIGNUM-ONLY ARITHMETICS]
	P6:  2464	[EVAL, APPLY, STUFF OPEN-CODED BY COMPLR]
	P7:  2102	[GARBAGE COLLECTOR]
	P10:  1147	[MEMORY MANAGEMENT STUFF]
	P11:  3137	[HIRSUTE READER, MAKNAM, ETC.]
	P12:  1673	[ARRAY STUFF]
	P13:  2271	[FASLOAD]
NML6PP+7	445767	 0.   486-248	IDND	Undefined
NML6D8+5	446013	 0.   486-284	CMUP	Undefined
NML6D8+11	446017	 0.   486-288	CMUDEC	Undefined
6BTNS0+22	446167	 0.   489-098	CMUP	Undefined
6BTNS0+32	446177	 0.   489-106	DECCMU	Undefined
NMS6B9		446416	 0.   490-156	CMUP	Undefined
NMS6RB+1	446474	 0.   490-225	CMUP	Undefined
NMS6RB+10	446503	 0.   490-232	CMUP	Undefined
NMS6R1+1	446515	 0.   490-243	CMUDEC	Undefined
FASLP1+25	447561	 2.   500-161	######
	###### RESTORE REF DATE FOR SAIL PROBEF?
OPEN9D+14	450510	 2.   513-059	###### IMAGE TTY OUTPUT?
$LSTN3+3	450661	 2.   516-034	###### REALLY OUGHT TO BE SMARTER
TTYMO2+5	451373	 2.   527-028	###### SAIL TTYMOR?
	P14:  4136	[NEW I/O PACKAGE]
SAIDSP+12	452015	 0.   532-166	CLOCKI	Undefined
	P15:  3363	[INTERRUPT AND UUO HANDLERS]
	***** 56 (OCTAL) SYSTEM SEGMENTS
	***** ONE SAR SEGMENT [760 UNUSED WORDS]
	***** ONE IMPURE SYMBOL BLOCK SEGMENT [740 UNUSED WORDS]
	P16:  461610	[SYSTEM ATOMS AND STUFF]
	***** ONE VALUE CELL SEGMENT [626 UNUSED WORDS]
	***** TWO SYMBOL HEADER SEGMENTS [725 UNUSED WORDS]
	***** THREE PURE SYMBOL BLOCK SEGMENTS
	HIGHEST NLISP INUM=1225
	LOWEST NLISP INUM=-625
	***** FOUR PURE FIXNUM SEGMENTS
	***** FOUR PURE LIST SEGMENTS [320 UNUSED WORDS]
	***** ZERO PURE FLONUM SEGMENTS
	***** TWO IMPURE LIST SEGMENTS [600 UNUSED WORDS]
	***** ONE IMPURE FIXNUM SEGMENT [733 UNUSED WORDS]
	***** ONE IMPURE FLONUM SEGMENT [777 UNUSED WORDS]
	***** ONE BIGNUM SEGMENT [773 UNUSED WORDS]
	TIME TO MAKE INITIAL STRUCT, PASS 2 = 127 SECS
	***** ONE BIT BLOCK SEGMENT

Constants area inclusive
From	To
4245	4255
402203	403142
417220	417554
422315	422406
423771	424043
426117	426207
430145	430167
432544	432653
434653	434755
436063	436124
441221	441263
443036	443156
445402	445447
451376	451605
455026	455170
31654	32073
Run time = 4:35.07
9424 Symbols including initial ones (58% used)
ββββ